home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / a_utils / _archvrs / unix / zoo-2_1.lha / zoo-2.1 / macros.ai < prev    next >
Encoding:
Text File  |  1991-10-01  |  369 b   |  19 lines
  1. ; $Source: /usr/home/dhesi/zoo/RCS/macros.ai,v $
  2. ; $Id: macros.ai,v 1.2 91/07/07 09:37:52 dhesi Exp $
  3. ;procedure index, used in-line to save some microseconds
  4. call_index    macro
  5.     mov    si,bx            ;si = bx * 5 (5 byte hash entries)
  6.     shl    si,1            ;si = bx * 2 * 2 + bx
  7.     shl    si,1
  8.     add    si,bx
  9.     endm    
  10.  
  11. malloc    macro    siz
  12.     ifdif    <bx>,<siz>
  13.     mov    bx,siz
  14.     endif
  15.     mov    ah,48h
  16.     int    21h
  17.     endm
  18.  
  19.